function h=rect( x, y, w, h, style )
% h=rect( x, y, w, h[, style] ); - draws rectangle with coord w,y,w,h,
% and style. For style details see PLOT
% Returns plot handle
% AUTOSTOP

outline = [ y x; y+h x; y+h x+w; y x+w; y x ];

if exist( 'style' ) == 1
	h = plot( outline(:,1), outline(:,2), style);
else
	h = plot( outline(:,1), outline(:,2) );
end
